home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 133
/
Tiger_Disk_133_20xx_Tiger-Crew-Disk_de_Side_B.d64
/
ende ii_130
(
.txt
)
next >
Wrap
Commodore BASIC
|
2023-02-26
|
252b
|
9 lines
0 print"[147]";:poke53265,80
1 a=a+1:ifa=32then40
6 forc=4to6:x=int(c*rnd(0)+c):poke53281,.:poke53280,.:poke646,x+1:
7 poke53265,80:print"[146] ",
8 poke53265,80:print" ",:
9 poke53282,x:poke53283,x+1:poke53284,x
30 print" [197][206][196][197] [160]*";:next:goto1
40 poke56325,.:print"[147]lukian";:poke56325,55:sys58592:sys2048